home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / alertwin.dxr / 00044_autorange button.ls < prev    next >
Encoding:
Text File  |  2000-01-28  |  531 b   |  29 lines
  1. property ancestor
  2. global gAlertWin, gGraph
  3.  
  4. on beginSprite me
  5.   spNum = me.spriteNum
  6.   spLoc = the loc of sprite spNum
  7.   ancestor = new(script("generic button"), "autorange", "internal", spNum, spLoc, me)
  8.   Inscope(ancestor)
  9.   return me
  10. end
  11.  
  12. on exitFrame me
  13.   doRollover(ancestor)
  14. end
  15.  
  16. on mouseDown me
  17.   trackMouse(ancestor)
  18. end
  19.  
  20. on performFunction me
  21.   global gGraph, gForgetList
  22.   setaProp(gGraph, #pIsConsistant, 1)
  23.   setaProp(gGraph, #pIsAutoRange, 1)
  24.   tell the stage
  25.     openGraphWindow()
  26.   end tell
  27.   closeMe(gAlertWin)
  28. end
  29.